
<%

Function manager_emular_jogos()

		id_rodada = rodada_get_atual()
		
		str = "Select id FROM torneios_jogos where realizado=0 and id_rodada="&id_rodada&" order by id asc"
    		Set rs = conexao_manager.Execute(str)
		
		DIM placar_1, placar_2, id_jogo
		
		Do while not rs.eof
		
					placar_1 = randomico(0,5)
					placar_2 = randomico(0,5)
					id_jogo = rs("id")
		
					str = "UPDATE torneios_jogos SET "
					str = str & "realizado='1', "
					str = str & "placar_1='"&placar_1&"', "
					str = str & "placar_2='"&placar_2&"' "
					str = str & " WHERE id="&id_jogo
					Set rsI = conexao_manager.Execute(str)
					
					ranking_atualizar_jogo conexao_manager, id_jogo
		
			rs.MoveNext
		Loop
		
		str = "Select id FROM torneios_geral where status=1"
    		Set rs = conexao_manager.Execute(str)
		
		Do while not rs.eof
				torneio_atualizar_torneio conexao_manager, rs("id"), id_rodada
			rs.MoveNext
		Loop
		
		manager_emular_jogos = 1

End Function

%>